home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 1 / Gigarom Macintosh Archives (Quantum Leap)(CDRM1080320)(1993).iso / FILES / HYP / C-D / DeveloperStax.cpt / Developer Stack 1.1 / card_25342.txt < prev    next >
Text File  |  1989-02-26  |  2KB  |  86 lines
  1. -- card: 25342 from stack: in.1
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 2612
  5. -- name: GetDANames
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: A004
  11. -- rect: left=260 top=30 right=52 bottom=368
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: getDANames
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   if the optionkey is down then pass mouseup
  23.   set cursor to 4
  24.   getDANames
  25.   DoList "select","cancel",namesofDAs,ONE
  26. end mouseUp
  27.  
  28.  
  29. -- part 2 (button)
  30. -- low flags: 00
  31. -- high flags: A003
  32. -- rect: left=82 top=302 right=324 bottom=182
  33. -- title width / last selected line: 0
  34. -- icon id / first selected line: 0 / 0
  35. -- text alignment: 1
  36. -- font id: 0
  37. -- text size: 12
  38. -- style flags: 0
  39. -- line height: 16
  40. -- part name: Install
  41. ----- HyperTalk script -----
  42. on mouseUp
  43.   if the optionkey is down then pass mouseup
  44.   put installres(XCMD,getDANames) into it
  45.   if it is empty then play oops
  46.   else answer it
  47. end mouseUp
  48.  
  49.  
  50.  
  51. -- part contents for background part 13
  52. ----- text -----
  53. 20
  54.  
  55. -- part contents for background part 2
  56. ----- text -----
  57. GetDANames
  58.  
  59. -- part contents for background part 3
  60. ----- text -----
  61.  
  62. This will return a list of all installed DAs.
  63.  
  64. Send comments & suggestions to Aron Roberts:      CompuServe:  73075,1342
  65.               GEnie:  ARON
  66. ARPA Internet:  csaron@garnet.Berkeley.EDU
  67.             BITNET:  CSARON@UCBCMSA.BITNET
  68.  
  69. This XCMD may be freely distributed.
  70. See also NumberofDAs*
  71.  
  72.  
  73.  
  74. -- part contents for background part 10
  75. ----- text -----
  76. Syntax:
  77.  
  78. getDANames
  79. Puts the names of the DAs in the Apple menu into an item list 
  80. COMMAND (in which each item is separated from the next by a comma) in the memory variable container, "namesOfDAs".  If 
  81. "namesOfDAs" does not already exist, it is created automatically.
  82.                 
  83. EXAMPLES:  getDANames -- puts list into "namesOfDAs" container put namesOfDAs into card field "DANames" put item 2 of  namesOfDAs into nameOfSecondDA 
  84.  
  85. The numberOfDAs*() function and getDANames command may be used in any noncommercial or commercial stacks.
  86.